10 input A
20 input B
30 C=Adiv B
40 D=RMmul 1000div B
50 for N=1to 20
60 print #N,C,".",D
70 next N
:return ;run 